
#read data into a vector
myData <- c(55, 56, 98, 100, 15, 12, 33, 45, 32, 67, 82, 19, 25)
#plot a line chart
plot(myData, type="l", col="green")
#print out summary - min,mean,max
summary(myData)
#add 3 points to the graph
points(min(myData), col="red")
points(mean(myData), col="red")
points(max(myData), col="red")

#command to source the file
#source("/home/sqa/simpleGraph.r")

